home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1991 December
/
64er_Magazin_91-12_1991_Markt__Technik_de_Side_A.d64
/
install.killer 3
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
3KB
|
54 lines
10 printchr$(14):poke53280,6:poke53281,6
20 print"[147][201]nstallations-[203]iller":printtab(10)"[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]"
30 printtab(14)"[212]eil 3 von":printtab(9)"[200]ans-[202]uergen [218]iethmann"
40 print"[194]itte legen [211]ie die [199]eos-"
50 print"[193]pplikationsdiskette 2.0 in das [204]aufwerk"
60 print"und druecke eine [212]aste":nu=197:z=1:wait203,64,64
70 open15,8,15,"i":open2,8,2,"#":print#15,"u1:";2;0;18;0:close2
80 poke53280,0:poke53281,0:print"[145][145][145][215]rite [213]tilites 2.0 in das [204]aufwerk"
90 wait203,64,64
100 open2,8,2,"#":print#15,"u2:"2;0;18,0
110 close2:close15
120 poke53280,8:poke53281,8:print"[145][145][211]ystemdiskette in das [204]aifwerk"
130 wait203,64,64
140 open15,8,15,"i":open2,8,2,"#":print#15,"u1:";2;0;20;5
150 print#15,"b-p:";2;nu:get#2,a$(0):a=asc(a$(i))
160 ifz=1thenb=a:nu=nu+1:z=z+1:goto150
170 ifz=2thenc=a:z=1:close2
180 poke53280,9:poke53281,9:print"[145][145][215]rite [213]tilites 2.0 in das [204]aufwerk"
190 wait203,64,64:ifz=1thenx=b:nu=252:z=z+1
200 open1,8,2,"#2"
210 print#15,"m-w"chr$(nu)chr$(05)chr$(1)chr$(x):print#15,"u2:"2;0;15;3
220 ifz=2thenx=c:nu=253:z=3:goto210
230 getn$:restore
240 readn:ifn<0then260
250 print#15,"m-w"chr$(lb)chr$(05)chr$(1)chr$(n):lb=lb+1:goto240
260 onabs(n)goto270,280,310
270 read lb:goto240
280 ifsi=1thenprint#15,"u2";2;0;t;s
290 read t:read s
300 print#15,"u1:"2;0;t;s:si=1:goto 240
310 print#15,"u2:"2;0;t;s
320 close1:close15:close2:print"[199]eo[205]erge 2.0 an [211]ystem angepasst":end
330 data -2,15,3,-1,0,15,11,24,69,78,68,73,70,32,111,104,110,101,32,73,70,32
340 data103,101,102,117,110,100,101,110,46,0,24,84,101,120,116,32,110,97,99,104
350 data32,76,97,98,101,108,32,105,103,110,111,114,105,101,114,116,46,0,24,70
360 data97,108,115,99,104,101,115,32,83,101,105,116,101,110,101,110,100,101,46
370 data0,24,70,101,104,108,101,114,58,32,32,32,0,24,73,110,32,68,97,116,101
380 data105,44,32,76,97,98,101,108,45,68,97,116,101,110,115,97,116,122,58,0,24
390 data73,110,32,68,97,116,101,105,44,32,68,97,116,101,110,115,97,116,122,58
400 data32,32,32,32,32,32,0,160,8,217,221,3,240,4,136,208,248,96,185,229,3,96
410 data64,91,92,93,123,124,125,126,235,142,153,154,132,148,129,225,36,2,0,0,0
420 data102,0,23,0,2,36,2,208,139,228,139,202,77,76,175,57,76,4,76,165,63,133
430 data245,32,47,4,48,31,169,0,133,245,162,212,202,189,60,4,133,3,202,189,60
440 data4,133,2,160,0,177,2,16,4,41,31,145,2,138,208,231,96,169,18,205,15,192
450 data16,3,173,19,192,96,-2,15,3,-1,254,211,67,-2,18,0,-1,0,18,1,65,0,0,0,0,0
460 data0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
470 data0,0,0,0
480 data0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,8,0,0,15,252,253,5,0,0,0,0
490 data0,0,0,0,0,0,0,0,0,0,0,0,1,8,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
500 data1,8,0,0,0,0,1,0,1,0,1,0,3,224,0,0,4,137,4,0,17,255,255,1,17,255,255,1
510 data17,255,255,1,87,114,105,116,101,32,85,116,105,108,105,116,105,101,115
520 data160,160,160,87,87,160,50,65,160,160,160,160,19,8,71,69,79,83,32,102,111
530 data114,109,97,116,32,86,49,46,48,-3